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- TITLE " at Fh - 1/0 BUFFER CONTROL 
- 1DENT 04-0 


® 
* COPYRIGHT (c) 1978, 1980, 1982, 1984 B * 
* DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. * 
: | ALL RIGHTS RESERVED. pa 
® 

* RNISHED UNDER A LICENSE AND MAY BE USED AND sor ice * 
* WITH THE TERMS OF SUCH sd 
e THe A BOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * 
* NEREOF MAY NOT BE PRO D R I E * 
® ERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
;* TRANSFERRED. * 
® ® 
* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
* CORPORATION. * 
® ® 
* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS’ * 
. SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * 
*® 

® ® 
* ® 
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MODIFIED BY: 


04 $TJ0002 S 29-F EB-1980 
ADD ALTERNATE ENTRY POIN CSMOVTOUSER AND IOCSMOVFRUSER. 
YS 26-SEP-1979 

E TO WORK CORRECTLY FOR 


ye ghey 
a~«< 


03 $TJ0001 
MODIFY IOCSPUTBYTE AND I 
BUFFERS THAT ARE PAGE AL 


02 CAMO01 MONIA 15-FEB-1979 
ADD IOCSPUTBYTE AND IOCSGETBYTE ROUTINES FOR TU-58 SUPPORT 
1/0 BUFFER CONTROL ROUTINES 

; MACRO LIBRARY CALLS 
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OOD NOA UNE WIN SO ODO NAU EWN O OONAUE WN (OOO NAU EWI - OOONOUS wn 


MUE ERE RL AES SWWWWWIIIIinononononononononony 2 2 


SPROEF DEFINE PROCESSOR REGISTERS 
SPTEDEF ;PAGE TABLE ENTRY DEFINITIONS 
SUCBDEF DEFINE UCB OFFSETS 
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A FROM USER BUFFER SYS.SRCIBUFFERCTL.MAR;1 
-SBTTL GET ONE BYTE OF DATA FROM USER BUFFER 

IOCSGETBYTE = GET ONE BYTE OF DATA FROM USER'S BUFFER 


THIS ROUTINE IS CALLED BY AN I/O DRIVER TO GET A SINGLE BYTE FROM THE 
USER'S BUFFER. 


PRIOR TO CALLING THIS ROUTINE, A CALL TO IOCSINITBUFWI 
MAP THE SYSTEM PAGE TABLE ENTRY INTO THE USER'S BUFFER 


| 
| 
INPUTS : 


=<" 
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° : ND MUST BE MADE TO 


WM OOOnNOuew "oO 


RO = SYSTEM VIRTUAL ADDRESS OF ONE-PAGE WINDOW INTO USER'S BUFFER. 
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$ = ADDRESS OF UCB. 
8 OUTPUTS: 
0 RO = UPDATED SYSTEM VIRTUAL ADDRESS 
1 Ri = ONE BYTE OF DATA (ZERO EXTENDED) 
0 UCBSL_SVAPTE IS UPDATED WHENEVER A PAGE BOUNDARY IS CROSSED 
o 3 THE DRIVER IS EXPECTED TO SAVE THE VALUE OF RO FOR SUBSEQUENT CALLS. 
0 : - 
00009 ; .PSECT WIONONPAGED 
000 1 IOCS$GETBYTE:: ; 
51 80 90 000 ; MOVB (RO) +,R1 [GET BYTE FROM USER'S BUFFER 
50 OFF 8F B83 000 BITW  #*XO1FF,RO [OVERFLOW PAGE BOUNDARY? 
if 00 4 BNEQ 108 [IF NEQ NO 
78 AS) 60046~=SC0.s«€000 5 ADDL #4,UCBSL_SVAPTE(RS) [UPDATE ADDRESS OF PROCESS PTE 
49 10 000 6 BSBB Ss: LOC SF ILSPT [FILL SPT, COMPUTE SYSTEM ADDRESS OF PAGE 
05 001 7 10$: RSB ;RETURN 


BUF FERCTL - 1/0 . | 
- FERS oul a AX/VMS Macro V04-00 Page As 


TROL _* sath $3:2 :5 49 

DATA INTO USER'S BUFFER ~SEP=1984 SYS.SRCIJBUFFERCTL.MAR; 1 
-SBTTL PUT ONE BYTE OF DATA INTO USER'S BUFFER 

IOCSPUTBYTE = PUT ONE BYTE OF DATA IN USER'S BUFFER 


THIS ROUTINE FY CALLED BY AN I/O DRIVER TO PUT A SINGLE BYTE OF DATA 
INTO THE USER'S BUFFER 


I$ ROUTINE, A CALL TO IOCS$INI 
TABLE ENTRY R'S 


a be ys. cf LLING TH TBUFWIND MUST BE MADE TO 
THE SYSTEM PAGE E ENTRY INTO THE USER'S BUFFER. 

INPUTS: 
RO = SYSTEM VIRTUAL ADDRESS OF ONE-PAGE WINDOW INTO USER'S BUFFER 
Ri LOW BYTE = DATA TO BE TRANSFERRED TO USER 
RS = ADDRESS OF UCB 


OUTPUTS: 
RO = UPDATED SYSTEM VIRTUAL ADDRESS OF BUFFER WINDOW 
UCBSL_SVAPTE IS UPDATED WHENEVER A PAGE BOUNDARY IS CROSSED 
THE DRIVER IS EXPECTED TO SAVE THE VALUE OF RO FOR SUBSEQUENT CALLS. 
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IOCSPUTBYTE:: : 
80 90 Mu /B R1,(RO)+ ;PUT BYTE INTO USERS'S BUFFER 
50 OFF 8F B3 BIiwW #*XO1FF,RO ;OVERFLOW PAGE BOUNDARY? 
12 BNEQ 10$ 3 1F NEQ NO 
78 AS) 604—CCO ADDL #4 ,UCBSL_SVAPTE(R5S) S UPDATE ADDRESS OF PROCESS PTE 
te 108 Sty 1OCSFILSPT FILLS SPT, COMPUTE SYSTEM ADDRESS OF PAGE 


V04~600 


J 2 
ER CONTROL 15-SEP-1984 23:52:45 VAX/VMS Macro v04-00 p 4 
FOR SINGLE BYTE TRANSFERS ~SEPISSe G:2839% PSIMSE Sacre yoeron., «= Page Al 


a ~SBTTL INITIALIZE FOR SINGLE BYTE TRANSFERS 

: IOCSINITBUFWIND = INITIALIZE ONE-PAGE WINDOW INTO USER'S BUFFER 
pS ROUTINE MUST BE CALLED BY A DRIVER TO SETUP ys INITIAL ONE- 

; rae CSputerte INTO A USER'S BUFFER BEFORE CALLING IOCSGETBYTE OR 


INPUTS: 
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R5 = ADDRESS OF UCB 
; OUTPUTS: 
RO = SYSTEM VIRTUAL ADDRESS OF WINDOW INTO USER'S BUFFER 


1OCSINITBUFWIND: : ; 
BSBB  —«IOCSFILSPT {RIL SPT. COMPUTE VIRTUAL ADDRESS OF PAGE 
BISW  UCBSW_BOFF (RS) .RO ;MERGE BYTE OFFSET INTO ADDRESS 
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BUFFERCTL - 1/0 BUFFER CONTROL 15=SEP=1984 23:52:45 VAX/VMS Macro V04-00 Page 
OO 600 MOVE FROM USER BUFFER moet 7 83:2 :11 CSYS.SRCIBUFFERCTL.MAR; 1 . 
145 : .SBTTL MOVE FROM USER BUFFER 
149 : IOCSMOVFRUSER = MOVE FROM USER BUFFER 
3 128 : THIS ROUTINE IS CALLED BY AN I/O DRIVER TO MOVE A STRING FROM A USER 
4 ! 9 3; BUFFER TO AN INTERNAL BUFFER. 
; é 3 INPUTS: 
9 154: R1 = ADDRESS OF INTERNAL BUFFER. 
029 155: Re = NUMBER OF BYTES TO BE MOVED. 
0 3 136 R5 = UCB ADDRESS OF DEVICE UNIT. 
6 ? 138 ; OUTPUTS: 
029 160; eeeTBSeee 
B31 
029 188 .ENABLE LSB 
029 164 IOCSMOVFRUSER:: ;MOVE FROM USER BUFFER 
F? 10 0 9 165 BSBB JOCSINI TBUF WIND ;SETUP WINDOW INTO BUFFER 
02D 167 LOCSMOVE RUSER2: : F 
50 «O1FF BF FF 0 p 168 10$: g1T #XOTFF .RO /OVERELOW PAGE BOUNDRY? 
17 ADD #4, UCBSL_SVAPTE(RS) [UPDATE ADDRESS OF USER PTE 
7 14 9 6 4 iF BSBB 1OCSFILSPT ‘FILL SYSTEM PTE WITH PROPER RELOCATION 
003A \¢ atch ph 
81 80 20 O3A 173 20$:  #MOVB  (RO)+,(R1)¢ :MOVE BYTE TO INTERNAL BUFFER 
ED 52 F ane 17% SOBGTR R2,10$ ZANY MORE BYTES TO MOVE? 
041 176 .DSABL LSB ‘ 


a | 
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BUFFERCTL - 1/0 BUFFER CONTROL 15=SEP=1 :5 45 VAX/vits Macro V04-00 Page 
V ERO MOVE TO USER BUFFER -SEP=1 198 §3i2 YOYS SRCIOUFFERCTL MAR: 1 . 3) vo 
41 178 .SBTTL MOVE TO USER BUFFER 
41 0 : IOCSMOVTOUSER = MOVE TO USER BUFFER 
4) Z : THIS ROUTINE I$ CALLED BY AN I/O DRIVER TO MOVE A STRING FROM AN INTERNAL 
41 3: BUFFER TO A USER BUFFER. 
41 5 : INPUTS: 
41 1 $ : RI = ADDRESS of INTERNAL BUFFER. 
4 4 8 : Re = NUMBER OF BYTES TO BE MOVED. 
41 ; R5 = UCB ADDRESS OF DEVICE UNIT. 
41 131 : OUTPUTS: 
041 138 $ eeeTBSere 
7 
041 196 -ENABLE LSB 
041 197 IOCSMOVTOUSER:: ;MOVE TO USER BUFFER 
DF 19 041 198 BSB JOCS1NITBUFWIND SINITIALIZE WINDOW INTO BUFFER 
O43 00 IOCSMOVTOUSER2:: ’ 
50 sO1FF . 85 0045 o1 10S: BIT SXOTFF, ,RO SOVERFLOW PAGE BOUNDRY? 
78 AS) 04 (6 004 88 ADDL #4 UCBSL pSVAPTE(RS) [UPDATE ADDRESS OF USER PTE 
07 10 005 04 BSBB-—sSs«SLOC SF ‘FILL SYSTEM PTE WITH PROPER RELOCATION 
005 7 JocsMovToU b 
80 81 05 06 O$: MOVB  (R1)+,(RO)+ ;MOVE BYTE TO USER BUFFER 
ED 52 f 053 0 SOBGTR R2,10$ ZANY MORE BYTES TO MOVE? 
059 $9 .OSABL LSB , 
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2 
L 
H TRANSFER PTE “SEP- 
: ~SBTTL FILL SYSTEM PTE WITH TRANSFER PTE 
: IOCSFILSPT = FILL SYSTEM PTE WITH TRANSFER PTE 


; THIS ROUTINE IS CALLED TO FILL A SYSTEM PTE WITH A TRANSFER PTE OF A 
; LOCKED DOWN BUFFER SO THAT IT MAY BE DIRECTLY ADDRESS. 


INPUTS: 
; RS = DEVICE UNIT UCB ADDRESS. 

; OUTPUTS: 

: RO = SYSTEM VIRTUAL ADDRESS OF START OF PAGE CONTAINING THE BUFFER. 
; REGISTERS R1, R2, AND R3 ARE PRESERVED ACROSS CALL. 


IOCSFILSPT:: ; M PTE WITH TRANSFER PTE 
PUSH $s 
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FILL SYSTE 
§ R3 SSAVE REGISTER 
MULLS #4 UCBSL Sven’ (R5) RO [CALCULATE BYTE OFFSET IN SYSTEM PAGE TABLE 
MOVL  @UCBSL_SUAPTE(R5).R ‘GET CONTENTS OF TRAN NSF ER PTE 
BLSS  10$ [IF LSS ENTRY IS V 
BSBW I esorer OPFN :GET PFN FOR INVALID Bre 
10$: INSV ,WPTESV_PFN,#PTESS_PFN, @MMGSGL_SPTBAS CRO] | 
'SET SYSTEM PTE ENT 
ASHL #7, RO, RO [CONVERT SVPN TO SYSTEM” VIRTUAL ADDRESS 
BBSS #31,R6,20$ ; 
20$: INVALID RO s INVALIDATE TRANSLATION BUFFER 
POPR  #*M<R3> SRESTORE REGISTERS 
RSB ; 
END 
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table SYS.SRCIBUFFERCTL.MAR; 1 
1OCSFILSPT RG 
LOCSGETBYTE RG 
1OCSINI TBUF WIND RG 
1OCSMOVF RUSER RG 
LOCSMOVF RUSER1 A RG 
1OCSMOVF RUSER2 D RG 
1OCSMOVTOUSER RG 
LOCSMOVTOUSER1 5 Re 
LOCSMOVTOUSER2 0 45 RG 
iOreere toes geeneeee 
1OCSPUTBYTE 00000011 a 8 
MMGSGL_SPTBASE eeteenee 
PR$_TBIS = 0003A 
Press m4. = 15 
PTESV_ = 9 
UCBSL— ~SUAPTE = 
UCBS$L_SVPN = 4444 164 
UCBSU _BOF F = 0000007C 
pore ce Teme mw eo me + 
! Psect synopsis ! 
$¢eeenee eae eo ens + 
PSECT name Allocation PSECT No. Attributes 


» 66s 00000000 f 00 : 1) -) NOPIC USR CON ABS LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 
ABSS 99000000 { » OI NOPIC USR CON ABS LCL NOSHR EXE RD WRT NOVEC BYTE 
W 1ONONPAGED 00000081 < 2 ¢ 2°} NOPIC USR CON REL LCL NOSHR EXE RD WRT NOVEC BYTE 
te erereere Serer ewe eee en ear ee 
! ; Performance indicators : 
Phase Page faults cPU Time Elapsed Time 
Initialization ‘ 00: 00: 700. 9 8:00:06 -08 
zonnane processing 1 + 700. OR: 44 
22 +3 :00:16.39 
Syabol table sort " :00: Hs 
s 2 ; 97 :00:04. 
cal table output 00:04 0:00:00. 
Psect synopsis output . BS :00. 
Cross-reference output 8 :00:00. 
Assembler run totals 426 06. 0:00:28.00 


The york ing isi Limit was 1050 pages. 

2563 bytes 1 pages) of virtual memory were used to buffer the intermediate 

th re were 30 pages of symbol table space allocated to hold 490 non-local ae Te symbols. 
435 source ta were read in Pass 1, producing 15 object records in Pass 


1 pages of virtual memory were used to define 10 macros. 
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Fact - 1/0 BUFFER CONTROL 
VAX=-11 iscre Run Statistics 
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; Macro Library statistics ! 


eseeoeaoeoeoe eueneaceenssnqseseh 


Macro Library name Macros defined 
$32 SDUA g: SYS.OBJJLIB.MLB;1 3 
“$255$DUA08: (SYSLIBJSTARLET .MLB; 2 4 
TOTALS (all Libraries) 7 


557 GETS were required to define 7 macros. 
There were no errors, warnings or information messages. 


"S$EP=1986 68:45:11 


MACRO/LIS=LISS$:BUFFERCTL/OBJ=OBJ$:BUFFERCTL MSRCS$: BUF FERCTL/UPDATE= (ENH$:BUFFERCTL) +EXECMLS/LIB 


AX/VMS Macro V04-00 
SYS.SRCJBUFFERCTL.MAR;1 
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